home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / nt4.0 workstation / IPINFO.INF < prev    next >
INI File  |  1996-07-27  |  3KB  |  86 lines
  1. ; Copyright (C) 1992 Microsoft Corporation
  2. ; All rights reserved.
  3. ;
  4. ; This file should contained the default gateway IP address, adapter IP
  5. ; Addresses and subnet mask IP addresses. To change the default gateway,
  6. ; change the line:
  7. ;       DefaultGateway = "xxx.xxx.xxx.xxx"
  8. ; where xxx.xxx.xxx.xxx is a valid IP address. If the default gateway is
  9. ; unknown, please change it to:
  10. ;       DefaultGateway = ""
  11. ;
  12. ; To change the default IP addresses and subnet mask IP addresses. First,
  13. ; change the line:
  14. ;       NumberOfIPAddress = X
  15. ; where X is the number of IP addresses which you want to specify for this
  16. ; machine.
  17. ;
  18. ; Then change or add the following lines for each IP address pair:
  19. ;       IPAddress<Y>  = "xxx.xxx.xxx.xxx"
  20. ;       SubnetMask<Y> = "xxx.xxx.xxx.xxx"
  21. ; where Y is IP addresses pair number and xxx.xxx.xxx.xxx are valid IP
  22. ; addresses.
  23. ; 
  24. ; Example:
  25. ;
  26. ;[DefaultIPInfo]
  27. ;    DefaultGateway = "11.1.0.0"
  28. ;    NumberOfIPAddress = 3
  29. ;    IPAddress1  = "11.1.12.1"
  30. ;    SubnetMask1 = "255.255.0.1"
  31. ;    IPAddress2  = "11.1.12.2"
  32. ;    SubnetMask2 = "255.255.0.2"
  33. ;    IPAddress3  = "11.1.12.3"
  34. ;    SubnetMask3 = "255.255.0.3"
  35.  
  36. [DefaultIPInfo]
  37.     DefaultGateway = ""
  38.     NumberOfIPAddress = 1
  39.     IPAddress1  = ""
  40.     SubnetMask1 = "255.255.0.0"
  41.  
  42.  
  43. ;------------------------------------------------------------------------
  44. ; GetIPInfo: Returns the default gateway IP address, a list of default IP
  45. ;       addresses and a list of default subnet mask IP addresses to the
  46. ;       caller.
  47. ;------------------------------------------------------------------------
  48.  
  49. [GetIPInfo]
  50.     set DefaultGateway = ""
  51.     set NumberOfIPAddress = 0
  52.     set IPAddressList  = ""
  53.     set SubnetMaskList = ""
  54.     read-syms DefaultIPInfo
  55.     set Count = 1
  56.     set UseHostFile = TRUE
  57.     LoadLibrary "x" $(!STF_CWDDIR)\tcpcfg.dll !TCPCFG_HANDLE
  58.     LibraryProcedure Result, $(!TCPCFG_HANDLE), CPlGetIPAddress
  59.     freeLibrary $(!TCPCFG_HANDLE)
  60.     ifint *($(Result),1) == 0
  61.         set IPAddressList = {*($(Result),2)}
  62.     else
  63.         set UseHostFile = FALSE
  64.     endif
  65.     
  66. LOOP = +
  67.     ifint $(Count) <= $(NumberOfIPAddress)
  68.         ifstr(i) $(UseHostFile) == FALSE
  69.             ifstr(i) $(IPAddressList) == ""
  70.                 set IPAddressList = $(IPAddress$(Count))
  71.             else
  72.                 set IPAddressList = >($(IPAddressList),$(IPAddress$(Count))))
  73.             endif
  74.         endif
  75.         ifstr(i) $(SubnetMaskList) == ""
  76.             set SubnetMaskList = $(SubnetMask$(Count))
  77.         else
  78.             set SubnetMaskList = >($(SubnetMaskList),$(SubnetMask$(Count)))
  79.         endif
  80.         set-add Count = $(Count), 1
  81.         goto LOOP
  82.     endif
  83.  
  84.     return $(DefaultGateway), $(IPAddressList), $(SubnetMaskList)
  85.         
  86.